﻿Imports DevExpress.XtraSplashScreen
Public Class DMSoChungTu
    Private Sub DMSoChungTu_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        SplashScreenManager.ShowForm(GetType(WaitForm1))
        Me.DMTinhTrangTableAdapter.Fill(Me.PCV_CLINICDataSet_Don.DMTinhTrang)
        Me.DMSoChungTuTableAdapter.Fill(Me.PCV_CLINICDataSet_Don.DMSoChungTu)
        SplashScreenManager.CloseForm()
    End Sub
    Public Sub New()
        InitializeComponent()
        Me.setObj(Me.PCV_CLINICDataSet_Don, Me.PCV_CLINICDataSet_Don.DMSoChungTu, DMSoChungTuBindingSource, Me.TableAdapterManager, Me.DMSoChungTuTableAdapter, Me.MaITextEdit)
    End Sub
End Class
